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AAAAAAAAA 

AAAAAAAAA 

AAAAAAAAA 
aka AAA 
AAA AaB 
AAA AAR 
AAA AAA 
AAA AAA 
AA AKA 
AAA AAA 
AAA AAA 
AAA AAA 
AAAAAAAAAAAAAAA 
AAAAAAAAAAAAAAA 
AAAAAAAAAAAAAAA 
AAA AAA 
AAA AAA 
AAA RAD 
AAA AAA 
AAA AAA 
AAA AAA 
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RRRRRRRRRRRR 
RRR 

RRR 

RRR 

RRR 

RRR 

RRR 
RRRRRRRRRRRR 
RRRRRRRRRRRR 
RRRRRRRRRRRR 
RRR = RRR 
RRR = RRR 
RRR RRR 
RRR RRR 
RRR RRR 
RRR RRR 
RRR 

RRR 

RRR 


—— 
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ne 
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DD DD 
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DD DD 
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DD DD 
DDDDDDDD 
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' Pascal Key Descriptor Block (KDB$) field definitions 
} File: PASKDB.REQ, Edit: SBL1001 


Vee R ERR RAE REA EERE AEREEAR ARATE 


'® COPYRIGHT (c) 1978, 1980, 1982, 1984 
ie DIGITAL EQUIPMENT CORPORATION, MAYNARD. MASSACHUSETTS. 
't ALL RIGHTS RESERVED. 


't THIS SOFTWARE IS FURNISHED ace A_ LICENSE AND MAY BE USED AND sorter 
Hed oy IN ACCORDANCE WITH THE TERMS OF SUCH ite ~ a dee HE 


aa 

7 

* 

® 

ke 

wv 

ie INCLUSION OF THE SOFTWARE OR THER * 
is COPIES, THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TOANY 
i® OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY * 
ie TRANSFERRED. ‘ 
tr 

ie THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT _ 
* 

* 

® 

® 

& 

* 

® 

® 


NOTIC 
‘* AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMEN 
!® CORPORATION. 


i® DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS 
!® SOFTWARE ON ECUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. 


See REE A ERA A EAE EAEA EERE eee eee 
' 


Author: Steven B. Lionel, 1-April-1981 
1-001 = Original. SBL 1-April-1981 


'¢ 
! The Key Descriptor Block describes the key fields for a record of an 
i _ indexed organization file. 


' KDB structure definition 


ELD 
KDBSFIELDS = 
SET 


KDB$B_COUNT = (0,0,8,0), ' Count of key definitions 
! to follow. 


'¢ 


! The following definitions are relative to a single key definition, 
i which occupies two longwords. 


KDB$B_KEY_NUMBER = (9,0,8,0], ' Key number (O=primary 

KDBSB_D TYPE = (0,6,8,6) i Datatype, code (DSCSK. YOTYPE. x) 
KDB athe = (0:16,8,05, ' Size o ey in bytes 

KDBSL“OFFSET = (4:0, $250) i Offset J ey in bytes 


TES; ' End of KDB 


i —EE — — ——EE . —_— 7 — 7 - ce 
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MACRO 
SPASSKDB_KEY_DESCRIPTOR = BLOCK C, BYTE] FIELD (KDBSFIELDS) 2%; 


! End of file PASKDB.REQ 


Ps 


Ll 
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